Считывает весь файл TextStream с текущего указателя файла и до конца и возвращает результирующую строку.

object.ReadAll

Параметры
object объект типа TextStream

Пример
Следующий код иллюстрирует использование ReadAll метода:

Function ReadAllTextFile
  Const ForReading = 1, ForWriting = 2
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  f.Write "Hello world!"
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  ReadAllTextFile =  f.ReadAll
End Function